home *** CD-ROM | disk | FTP | other *** search
/ Aminet 45 / Aminet 45 (2001)(GTI - Schatztruhe)[!][Oct 2001].iso / Aminet / dev / e / yaec.lha / modules / ddebuglib.e < prev    next >
Text File  |  2001-08-12  |  737b  |  18 lines
  1. OPT MODULE -> ddebuglib.e
  2. OPT EXPORT
  3. OPT NDDC
  4. OPT LINK 'e:linklib/ddebug.lib' -> whatever setup ya got..
  5. OPT XREF DGetChar, DGetNum, DMayGetChar, DPutChar, DPutStr, _KCmpStr
  6.  
  7. #macro DGetChar() (LONG) IS ASM ' bsr DGetChar'
  8. #macro DGetNum() (LONG) IS ASM ' bsr DGetNum'
  9. #macro DMayGetChar() (LONG) IS ASM ' bsr DMayGetChar'
  10. #macro DPutChar(char) (LONG) IS (D0 := char) BUT ASM ' bsr DPutChar'
  11. #macro DPutFmt(fstr,...) (VOID) IS Stores(StringF(String(1024), fstr, ...)) BUT DPutStr(Long(A7)) BUT EndString(Long(A7)) BUT Rems(SIZEOF LONG)
  12. #macro DPutStr(str) (VOID) IS (A0 := str) BUT ASM ' bsr DPutStr'
  13. #macro DCmpStr(string1, string2) (LONG) IS Stores(string1,string2) BUT ASM ' bsr _KCmpStr' BUT Rems(8) BUT D0
  14.  
  15.  
  16. /* (LS) 2001 YAEC19 */
  17.  
  18.